package com.ruoyi.system.service.impl;

import java.util.ArrayList;
import java.util.Iterator;
import java.util.List;
import java.util.stream.Collectors;
import org.springframework.beans.factory.annotation.Autowired;
import org.springframework.stereotype.Service;
import com.ruoyi.common.annotation.DataScope;
import com.ruoyi.common.constant.UserConstants;
import com.ruoyi.common.core.domain.TreeSelect;
import com.ruoyi.common.core.domain.entity.SysCourt;
import com.ruoyi.common.core.domain.entity.SysRole;
import com.ruoyi.common.core.domain.entity.SysUser;
import com.ruoyi.common.core.text.Convert;
import com.ruoyi.common.exception.ServiceException;
import com.ruoyi.common.utils.SecurityUtils;
import com.ruoyi.common.utils.StringUtils;
import com.ruoyi.common.utils.spring.SpringUtils;
import com.ruoyi.system.mapper.SysCourtMapper;
import com.ruoyi.system.mapper.SysRoleMapper;
import com.ruoyi.system.service.ISysCourtService;

/**
 * 法院管理 服务实现
 *
 * @author ruoyi
 */
@Service
public class SysCourtServiceImpl implements ISysCourtService
{
    @Autowired
    private SysCourtMapper courtMapper;

    @Autowired
    private SysRoleMapper roleMapper;

    /**
     * 查询法院管理数据
     *
     * @param court 法院信息
     * @return 法院信息集合
     */
    @Override
    @DataScope(courtAlias = "d")
    public List<SysCourt> selectCourtList(SysCourt court)
    {
//        court.setStatus(UserConstants.COURT_DISABLE);
        return courtMapper.selectCourtList(court);
    }

    /**
     * 构建前端所需要树结构
     *
     * @param courts 法院列表
     * @return 树结构列表
     */
    @Override
    public List<SysCourt> buildCourtTree(List<SysCourt> courts)
    {
        List<SysCourt> returnList = new ArrayList<SysCourt>();
        List<Long> tempList = new ArrayList<Long>();
        for (SysCourt court : courts)
        {
            tempList.add(court.getCourtId());
        }
        for (Iterator<SysCourt> iterator = courts.iterator(); iterator.hasNext();)
        {
            SysCourt court = (SysCourt) iterator.next();
            // 如果是顶级节点, 遍历该父节点的所有子节点
            if (!tempList.contains(court.getParentId()))
            {
                recursionFn(courts, court);
                returnList.add(court);
            }
        }
        if (returnList.isEmpty())
        {
            returnList = courts;
        }
        return returnList;
    }

    /**
     * 构建前端所需要下拉树结构
     *
     * @param courts 法院列表
     * @return 下拉树结构列表
     */
    @Override
    public List<TreeSelect> buildCourtTreeSelect(List<SysCourt> courts)
    {
        List<SysCourt> courtTrees = buildCourtTree(courts);
        return courtTrees.stream().map(TreeSelect::new).collect(Collectors.toList());
    }

    /**
     * 根据角色ID查询法院树信息
     *
     * @param roleId 角色ID
     * @return 选中法院列表
     */
    @Override
    public List<Long> selectCourtListByRoleId(Long roleId)
    {
        SysRole role = roleMapper.selectRoleById(roleId);
        return courtMapper.selectCourtListByRoleId(roleId, role.isCourtCheckStrictly());
    }

    /**
     * 根据法院ID查询信息
     *
     * @param courtId 法院ID
     * @return 法院信息
     */
    @Override
    public SysCourt selectCourtById(Long courtId)
    {
        return courtMapper.selectCourtById(courtId);
    }

    /**
     * 根据ID查询所有子法院（正常状态）
     *
     * @param courtId 法院ID
     * @return 子法院数
     */
    @Override
    public int selectNormalChildrenCourtById(Long courtId)
    {
        return courtMapper.selectNormalChildrenCourtById(courtId);
    }

    /**
     * 是否存在子节点
     *
     * @param courtId 法院ID
     * @return 结果
     */
    @Override
    public boolean hasChildByCourtId(Long courtId)
    {
        int result = courtMapper.hasChildByCourtId(courtId);
        return result > 0;
    }

    /**
     * 查询法院是否存在用户
     *
     * @param courtId 法院ID
     * @return 结果 true 存在 false 不存在
     */
    @Override
    public boolean checkCourtExistUser(Long courtId)
    {
        int result = courtMapper.checkCourtExistUser(courtId);
        return result > 0;
    }

    /**
     * 校验法院名称是否唯一
     *
     * @param court 法院信息
     * @return 结果
     */
    @Override
    public String checkCourtNameUnique(SysCourt court)
    {
        Long courtId = StringUtils.isNull(court.getCourtId()) ? -1L : court.getCourtId();
        SysCourt info = courtMapper.checkCourtNameUnique(court.getCourtName(), court.getParentId());
        if (StringUtils.isNotNull(info) && info.getCourtId().longValue() != courtId.longValue())
        {
            return UserConstants.NOT_UNIQUE;
        }
        return UserConstants.UNIQUE;
    }

    /**
     * 校验法院是否有数据权限
     *
     * @param courtId 法院id
     */
    @Override
    public void checkCourtDataScope(Long courtId)
    {
        if (!SysUser.isAdmin(SecurityUtils.getUserId()))
        {
            SysCourt court = new SysCourt();
            court.setCourtId(courtId);
            List<SysCourt> courts = SpringUtils.getAopProxy(this).selectCourtList(court);
            if (StringUtils.isEmpty(courts))
            {
                throw new ServiceException("没有权限访问法院数据！");
            }
        }
    }

    /**
     * 新增保存法院信息
     *
     * @param court 法院信息
     * @return 结果
     */
    @Override
    public int insertCourt(SysCourt court)
    {
        SysCourt info = courtMapper.selectCourtById(court.getParentId());
        // 如果父节点不为正常状态,则不允许新增子节点
        if (!UserConstants.COURT_NORMAL.equals(info.getStatus()))
        {
            throw new ServiceException("法院停用，不允许新增");
        }
        court.setAncestors(info.getAncestors() + "," + court.getParentId());
        return courtMapper.insertCourt(court);
    }

    /**
     * 修改保存法院信息
     *
     * @param court 法院信息
     * @return 结果
     */
    @Override
    public int updateCourt(SysCourt court)
    {
        SysCourt newParentCourt = courtMapper.selectCourtById(court.getParentId());
        SysCourt oldCourt = courtMapper.selectCourtById(court.getCourtId());
        if (StringUtils.isNotNull(newParentCourt) && StringUtils.isNotNull(oldCourt))
        {
            String newAncestors = newParentCourt.getAncestors() + "," + newParentCourt.getCourtId();
            String oldAncestors = oldCourt.getAncestors();
            court.setAncestors(newAncestors);
            updateCourtChildren(court.getCourtId(), newAncestors, oldAncestors);
        }
        int result = courtMapper.updateCourt(court);
        if (UserConstants.COURT_NORMAL.equals(court.getStatus()) && StringUtils.isNotEmpty(court.getAncestors())
                && !StringUtils.equals("0", court.getAncestors()))
        {
            // 如果该法院是启用状态，则启用该法院的所有上级法院
            updateParentCourtStatusNormal(court);
        }
        return result;
    }

    /**
     * 修改该法院的父级法院状态
     *
     * @param court 当前法院
     */
    private void updateParentCourtStatusNormal(SysCourt court)
    {
        String ancestors = court.getAncestors();
        Long[] courtIds = Convert.toLongArray(ancestors);
        courtMapper.updateCourtStatusNormal(courtIds);
    }

    /**
     * 修改子元素关系
     *
     * @param courtId 被修改的法院ID
     * @param newAncestors 新的父ID集合
     * @param oldAncestors 旧的父ID集合
     */
    public void updateCourtChildren(Long courtId, String newAncestors, String oldAncestors)
    {
        List<SysCourt> children = courtMapper.selectChildrenCourtById(courtId);
        for (SysCourt child : children)
        {
            child.setAncestors(child.getAncestors().replaceFirst(oldAncestors, newAncestors));
        }
        if (children.size() > 0)
        {
            courtMapper.updateCourtChildren(children);
        }
    }

    /**
     * 删除法院管理信息
     *
     * @param courtId 法院ID
     * @return 结果
     */
    @Override
    public int deleteCourtById(Long courtId)
    {
        return courtMapper.deleteCourtById(courtId);
    }

    /**
     * 递归列表
     */
    private void recursionFn(List<SysCourt> list, SysCourt t)
    {
        // 得到子节点列表
        List<SysCourt> childList = getChildList(list, t);
        t.setChildren(childList);
        for (SysCourt tChild : childList)
        {
            if (hasChild(list, tChild))
            {
                recursionFn(list, tChild);
            }
        }
    }

    /**
     * 得到子节点列表
     */
    private List<SysCourt> getChildList(List<SysCourt> list, SysCourt t)
    {
        List<SysCourt> tlist = new ArrayList<SysCourt>();
        Iterator<SysCourt> it = list.iterator();
        while (it.hasNext())
        {
            SysCourt n = (SysCourt) it.next();
            if (StringUtils.isNotNull(n.getParentId()) && n.getParentId().longValue() == t.getCourtId().longValue())
            {
                tlist.add(n);
            }
        }
        return tlist;
    }

    /**
     * 判断是否有子节点
     */
    private boolean hasChild(List<SysCourt> list, SysCourt t)
    {
        return getChildList(list, t).size() > 0;
    }
}
